home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The School House•
/
QuizMaster v.10 •••
/
QuizMaster V1.0
/
QuizMaster V1.0.rsrc
/
CODE_1072_SetCreate.txt
< prev
next >
Wrap
Text File
|
1988-10-21
|
3KB
|
57 lines
# near model CODE resource
# jump table entries: 0-0 (1 of them)
00000000 4E54 FEB0 link A4, -0x0150
00000004 4EAD 002A jsr [A5 + 0x2A /* export_1 */]
00000008 0C00 0002 cmpi.b D0, 0x2
0000000C 6672 bne +0x74 /* 00000080 */
0000000E 264A movea.l A3, A2
00000010 4EAD 0082 jsr [A5 + 0x82 /* export_12 */]
00000014 4EAD 008A jsr [A5 + 0x8A /* export_13 */]
00000018 1942 FF00 move.b [A4 - 0x100], D2
0000001C 43EC FF01 lea.l A1, [A4 - 0xFF]
00000020 204B movea.l A0, A3
00000022 4280 clr.l D0
00000024 1002 move.b D0, D2
00000026 A02E syscall BlockMove/BlockMoveData
00000028 41EC FEB0 lea.l A0, [A4 - 0x150]
0000002C 7014 moveq.l D0, 0x14
0000002E 6006 bra +0x8 /* 00000036 */
label00000030:
00000030 20FC 0000 0000 move.l [A0]+, 0x0
label00000036:
00000036 51C8 FFF8 dbf D0, -0xA /* 00000030 */
0000003A 41EC FF00 lea.l A0, [A4 - 0x100]
0000003E 2948 FEC2 move.l [A4 - 0x13E], A0
00000042 41EC FEB0 lea.l A0, [A4 - 0x150]
00000046 A00C syscall GetFileInfo/PBHGetFInfo/HGetFileInfo
00000048 4A40 tst.w D0
0000004A 663C bne +0x3E /* 00000088 */
0000004C 4EAD 002A jsr [A5 + 0x2A /* export_1 */]
00000050 0C00 0002 cmpi.b D0, 0x2
00000054 662A bne +0x2C /* 00000080 */
00000056 264A movea.l A3, A2
00000058 4EAD 0082 jsr [A5 + 0x82 /* export_12 */]
0000005C 4EAD 008A jsr [A5 + 0x8A /* export_13 */]
00000060 0C02 0004 cmpi.b D2, 0x4
00000064 6622 bne +0x24 /* 00000088 */
00000066 204B movea.l A0, A3
00000068 43EC FED4 lea.l A1, [A4 - 0x12C]
0000006C 7004 moveq.l D0, 0x04
0000006E A02E syscall BlockMove/BlockMoveData
00000070 41EC FEB0 lea.l A0, [A4 - 0x150]
00000074 A00D syscall SetFileInfo/PBHSetFInfo/HSetFileInfo
00000076 4A40 tst.w D0
00000078 660E bne +0x10 /* 00000088 */
0000007A 4E5C unlink A4
0000007C 7000 moveq.l D0, 0x00
0000007E 4E75 rts
label00000080:
00000080 243C 0000 000D move.l D2, 0xD /* '\r' */
00000086 6006 bra +0x8 /* 0000008E */
label00000088:
00000088 243C 0000 0005 move.l D2, 0x5
label0000008E:
0000008E 4E5C unlink A4
00000090 7000 moveq.l D0, 0x00
00000092 4EAD 0042 jsr [A5 + 0x42 /* export_4 */]